home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #1 / Ham Radio 2000.iso / ham2000 / tcp_ip / tnos / tnos100s / ax25aar.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-04-30  |  4.7 KB  |  191 lines
  1. #include "global.h"
  2. #include "config.h"
  3. #include "mbuf.h"
  4. #include "timer.h"
  5. #include "iface.h"
  6. #include "ax25.h"
  7. #include "icmp.h"
  8. #include "ip.h"
  9. #include "arp.h"
  10. #include "icmp.h"
  11. #include "rip.h"
  12. #include <ctype.h>
  13.  
  14. #ifdef AX25
  15. #ifdef AUTOROUTE
  16.  
  17. int ax25_check_corruption __ARGS((struct ax25 *header));
  18. int ax25_legal              __ARGS((char *call_ssid));
  19. int Ax25_autoroute = 0; /*auto-routing on by default*/
  20.  
  21. #ifdef RSPF
  22. extern int RspfActive;
  23. #endif
  24.  
  25. int
  26. doax25autoroute(argc,argv,p)
  27. int argc ;
  28. char *argv[] ;
  29. void *p;
  30. {
  31. #ifdef RSPF
  32.     if(RspfActive) {
  33.         tputs("RSPF active. ");
  34.         argc = 0;
  35.     }
  36. #endif
  37.     return setbool(&Ax25_autoroute,"AX.25 IP autorouting",argc,argv);
  38. }
  39.  
  40. /* Create an ARP_RESPONSE packet for any IP packet we hear via an ax25 interface
  41.  * This will automatically update any preexisting entry.
  42.  * If no route is currently defined, then add that as well...
  43.  *
  44.  */
  45. void
  46. ax25eavesdrop(iface,source,dest,bp)
  47. struct iface *iface;
  48. char *source;
  49. char *dest;
  50. struct mbuf *bp;
  51. {
  52.     struct ip ipstuff;
  53.     register struct route *rt;
  54.     struct arp_tab *ap;
  55.     int16 ip_len;
  56.     int16 length;
  57.     char (*mpp)[AXALEN];
  58.     
  59.     if(len_p(bp) < IPLEN){
  60.         /* The packet is shorter than a legal IP header */
  61.         return;
  62.     }
  63.     /* Sneak a peek at the IP header's IHL field to find its length */
  64.     ip_len = (bp->data[0] & 0xf) << 2;
  65.     if(ip_len < IPLEN){
  66.         /* The IP header length field is too small */
  67.         return;
  68.     }
  69.     if(cksum(NULLHEADER,bp,ip_len) != 0){
  70.         /* Bad IP header checksum; discard */
  71.         return;
  72.     }
  73.     if(ntohip(&ipstuff,&bp) == -1){
  74.         return;
  75.     }
  76.  
  77.     Arp_stat.recv++;
  78.  
  79.     for(mpp = Ax25multi;(*mpp)[0] != '\0';mpp++){
  80.         if(addreq(source,*mpp)){
  81.             /* This guy is trying to say he's got the broadcast address! */
  82.             Arp_stat.badaddr++;
  83.             return;
  84.         }
  85.     }
  86.  
  87.  
  88. /* If this entry already exists, but points to a different iface, don't add. */
  89.     if((rt = rt_lookup(ipstuff.source)) != NULLROUTE)
  90.         if(rt != &R_default)
  91.             if(rt->iface != iface)
  92.                 return;
  93.  
  94. /* If no route currently exists, add one with a high metric, ttl = ARPLIFE, mark it as private */
  95. /* If we know a better route, or we have a manual route entered, go home. */
  96.     if(    rt == NULLROUTE ||
  97.         rt == &R_default ||
  98.         ((rt->timer.duration != 0) && (rt->metric >= (RIP_INFINITY - 1))))
  99.             rt_add(ipstuff.source, (unsigned int)32, (int32)0, iface, RIP_INFINITY - 1,
  100.                 /* minimum of 2 sec life */ (ARPLIFE-60 > 1) ? ARPLIFE-60 : 2, 1);
  101.  
  102. /* If route is via a gateway, do not add an ARP entry. */
  103.     if( rt->gateway == (int32)0){
  104.         /* If this guy is already in the table, update its entry
  105.          * unless it's a manual entry (noted by the lack of a timer)
  106.          */
  107.         ap = NULLARP;    /* ap plays the role of merge_flag in the spec */
  108.         if(((ap = arp_lookup(ARP_AX25,ipstuff.source,iface)) != NULLARP
  109.             && ap->timer.duration != 0) || ap == NULLARP){
  110.                 ap = arp_add(ipstuff.source,ARP_AX25,source,0,iface);
  111.         }
  112.     }
  113.     return;
  114. }
  115.  
  116. /* Inspect the AX.25 header to determine if it is legal.  If it has anything
  117.     wrong with it, dump this packet...
  118. */
  119. #define    ishash(x)    ((char)(x) == '#' ? 1 : 0)
  120. #define    isaspace(x)    ((char)(x) == ' ' ? 1 : 0)
  121.  
  122. int ax25_check_corruption(header)
  123. struct ax25 *header;
  124. {
  125.     int loop;
  126.  
  127.     /* The header structure contains two fixed-length and one variable-length
  128.         char arrays, containing the ax25 callsign/ssid pairs for the source,
  129.         destination, and (optional) digipeaters.
  130.  
  131.         The integer "ndigis" says how many digis are in the path, upto the
  132.         constant MAXDIGIS.
  133.  
  134.         Because the arrays are not null-terminated, we can just walk through
  135.         the char arrays looking for any illegal characters to determine if
  136.         the header is corrupt.  We'll rely on the higher-level protocols to
  137.         determine if the data in the packet is corrupt...
  138.  
  139.         We return 0 if the packet is possibly good, or 1 if it is definitely
  140.         corrupt.
  141.     */
  142.  
  143.     if (header->ndigis > MAXDIGIS || header->ndigis < 0){
  144.         return 1;
  145.     }
  146.  
  147.     if (ax25_legal(header->source)){
  148.         return 1;
  149.     }
  150.  
  151.     if (ax25_legal(header->dest)){
  152.         return 1;
  153.     }
  154.  
  155.     for (loop = 0; loop < header->ndigis; loop++)
  156.         if (ax25_legal(header->digis[loop])){
  157.             return 1;
  158.         }
  159.  
  160.     return 0;
  161.  
  162.  
  163. }
  164.  
  165. /* Check the callsign portions. */
  166. int ax25_legal(call_ssid)
  167. char *call_ssid;
  168. {
  169.     int loop;
  170.     unsigned char chr;
  171.  
  172.     for (loop = 0; loop < AXALEN-1; loop++){
  173.  
  174.         /* Put the ascii value of the char into chr */
  175.         chr = (*(call_ssid + loop));
  176.         chr = chr >> 1;
  177.  
  178.         /* Now see if it valid. */
  179.         if ((isupper(chr) | isdigit(chr) | ishash(chr) | isaspace(chr)) == 0)
  180.          /* A bad chr */
  181.             return 1;
  182.     }
  183.  
  184.     /* The header passed inspection, so return 0... */
  185.     return 0;
  186.  
  187. }
  188.  
  189. #endif /* AUTOROUTE */
  190. #endif /* AX25 */
  191.